home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Almathera Ten Pack 3: CDPD 3
/
Almathera Ten on Ten - Disc 3: CDPD3.iso
/
ab20
/
ab20_archive
/
languages
/
assembly
/
powervisor_113.lzh
/
Source
/
BuggyProgram.asm
next >
Wrap
Assembly Source File
|
1991-08-07
|
1KB
|
67 lines
;This program is buggy, if you try to run it normally it will crash
;See the 'debug' file for an example to debug this program
addsym
SysBase equ 4
;_LVOAllocMem equ -198
;_LVOFreeMem equ -210
StartProgram:
moveq #0,d1
moveq #100,d0
loop: addq.l #1,d1
dbra d0,loop
bsr Sub1
beq.s theend
bsr Sub2
bsr Sub3
theend:
moveq #0,d0
rts
Sub1:
move.l #100,d0
moveq #0,d1
move.l (SysBase).w,a6
jsr _LVOAllocMem(a6)
lea Block(pc),a0
move.l d0,(a0)
rts
Sub2:
moveq #0,d0
moveq #1,d1
moveq #2,d2
moveq #3,d3
moveq #4,d4
moveq #5,d5
moveq #6,d6
moveq #7,d7
move.l Block(pc),a0
illegal
move.l d0,(a0)+
move.l d1,(a0)+
move.l d2,(a0)+
move.l d3,(a0)+
move.l d4,(a0)+
move.l d5,(a0)+
move.l d6,(a0)+
move.l d7,(a0)+
rts
Sub3:
move.l #64,d0
move.l Block(pc),a1
move.l (SysBase).w,a6
jsr _LVOFreeMem(a6)
rts
Block: dc.l 0
END